function Mom_Model=SubFun_IRF2Mom(PP,SS,MODEL,IRF)

Mom_Model   =   [SubFun_MaxAbsVal(IRF.Eps_Eta_M_dom.C);...
                 SubFun_MaxAbsVal(IRF.Eps_Eta_M_dom.ir)*4;...
                 SubFun_MaxAbsVal(IRF.Eps_Eta_M_dom.DevUIP)*4;...
                 SubFun_MaxAbsVal(IRF.Eps_Eta_M_dom.RelPrice);...
                 SubFun_MaxAbsVal(IRF.Eps_Eta_Y_H.C);...
                 SubFun_MaxAbsVal(IRF.Eps_Eta_Y_H.ExchangeRate);...
                 SubFun_MaxAbsVal(IRF.Eps_Eta_Y_H.Export)] ...
                 *100;